The 640 MEG Shareware Studio 2/The 640 Meg Shareware Studio CD-ROM Volume II (Data Express)(1993).ISO/business/submgr14.zip/SUBLIST.FMT

Text File | 1992-08-24 | 762b | 22 lines

@  2, 11  SAY "Master Data Entry Record for Newspaper Subscriptions"
@  5,  0  SAY "Name:"
@  5, 18  GET  SUBLIST->NAME
@  7,  0  SAY "Address:"
@  7, 18  GET  SUBLIST->ADDRESS1
@  8, 18  GET  SUBLIST->ADDRESS2
@ 10,  0  SAY "City, State, Zip"
@ 10, 18  GET  SUBLIST->CITY
@ 10, 43  SAY ","
@ 10, 45  GET  SUBLIST->STATE
@ 10, 48  GET  SUBLIST->ZIP_4
@ 14,  0  SAY "Starting Date for Subscription:"
@ 14, 32  GET  SUBLIST->START_SUB
@ 16,  0  SAY "End Date for Subscription:"
@ 16, 32  GET  SUBLIST->END_SUB
@ 18,  0  SAY "Paid Subscription?"
@ 18, 19  GET  SUBLIST->PAID_SUB  PICTURE "Y"
@ 18, 22  SAY "Subscription Number -> S-"
@ 18, 47  SAY  SUBLIST->SUB_NUMBER  PICTURE "9999999999"
@  1,  9  TO  3, 64    DOUBLE
@ 12,  0  TO 12, 79